From: Juanma Barranquero <lekktu@gmail.com>
Date: Fri, 14 Feb 2003 07:01:28 +0000 (+0000)
Subject: (display-time-string-forms): Add face property to mail string.
X-Git-Tag: archive/raspbian/1%29.2+1-2+rpi1~1^2~28273
X-Git-Url: https://dgit.raspbian.org/%22http:/www.example.com/cgi/%22https:/www.github.com/%22bookmarks:///%22http:/www.example.com/cgi/%22https:/www.github.com/%22bookmarks:/?a=commitdiff_plain;h=e7eace74cd74ef50a6e351f6fd23c7622fcc9cde;p=emacs.git

(display-time-string-forms): Add face property to mail string.
---

diff --git a/lisp/time.el b/lisp/time.el
index 09e5e6b76bd..c0b6c6ab6bd 100644
--- a/lisp/time.el
+++ b/lisp/time.el
@@ -171,6 +171,7 @@ depend on `display-time-day-and-date' and `display-time-24hr-format'."
 			     ,@(list :background (face-attribute
 						  display-time-mail-face
 						  :background)))
+                 'face display-time-mail-face
 		 'help-echo "You have new mail; mouse-2: Read mail"
 		 'local-map (make-mode-line-mouse-map 'mouse-2
 						      read-mail-command)))